home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 7 / FM Towns Free Software Collection 7.iso / data / dora / dorarttl.plp < prev    next >
Text File  |  1993-11-30  |  1KB  |  39 lines
  1. %Rttlc{
  2.     case(RTTLC={},
  3.     {Yes},
  4.     {
  5.     loop({    SNDMSG({erande_f.snd});
  6.     %a @plane(
  7.     {c ログカッターRTTLC最新版は、\n}|
  8.     {cFBBS(NIFTY)のLIB 5にアップされています。\n}|
  9.     {s 既にダウンロードは済んでいますか？ /はい　/いいえ \n},
  10.         );
  11.     %ok    @head(@getline(a,1,1),{\n});
  12.             case    (ok,{ 1},
  13. 　                {
  14. footnote({自動実行させる為に「ディレクトリの設定」での登録をお勧めします});
  15.     SNDMSG({nyuryo_f.snd});
  16.     RTTLdir:=@input({RTTLC.EXEをﾄﾞﾗｲﾌﾞ名からのﾌﾙﾊﾟｽで入力して下さい});
  17.     case(@tail(RTTLC,{\})={RTTLC.EXE},
  18.     {Yes},{command(RTTL);footnote({ＲＴＴＬＣ実行中  })},
  19.     {No},{footnote({RTTLC.EXEをﾄﾞﾗｲﾌﾞ名からのﾌﾙﾊﾟｽで入力}|
  20.             {して下さい});SNDMSG({okasi_f.snd});wait(3)});
  21.                 },
  22.                 { 2},{display({
  23. \n☆ログカッターRTTLC最新版(’93/05/11現在)のお知らせ☆
  24. \n＞LIB 5\n番号  ID       登録日付 バイト  参照   データ名\n222  HCB01371 93/04/21   60149   12 B RTTLC200.LZH RT･TLC Ver2.00 RT用LOGｶｯﾀｰ});
  25. footnote({ログカッターRTTLCをFBBS(NIFTY)のLIB 5からﾀﾞｳﾝﾛｰﾄﾞして下さい｡});
  26.                     wait(5);im({No})},
  27.                     ,{im({No})}
  28.                 );
  29.             });
  30.     },
  31.     {No},
  32.     {
  33.         footnote({ＲＴＴＬＣ実行中  });
  34.         command(RTTLC);
  35.     });
  36.         im({Yes});
  37.     };
  38. Rttlc;
  39.